home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / CASIOCOL.ZIP / KRILE1B.ZIP / SOURCE.ZIP / TESTA.ASI < prev    next >
Encoding:
Text File  |  1997-11-24  |  105 b   |  12 lines

  1. a$="Frog!"
  2. a=varptr(a$)
  3. z=a+6
  4. for x=a to z
  5. b=peek(x)
  6. b$=chr$(b)
  7. print b$;
  8. print x
  9. next x
  10. end
  11.  
  12.